object FormEmail: TFormEmail Left = 297 Top = 128 HelpContext = 708 BorderIcons = [biSystemMenu] BorderStyle = bsSingle Caption = 'Send Mass Emails' ClientHeight = 438 ClientWidth = 587 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poDesktopCenter ShowHint = True OnCloseQuery = FormCloseQuery OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object btnHelp: TBitBtn Left = 85 Top = 396 Width = 75 Height = 28 Caption = '&Help' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = btnHelpClick end object btnBack: TBitBtn Left = 200 Top = 396 Width = 75 Height = 28 Caption = 'B&ack' Enabled = False Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = btnBackClick end object btnNext: TBitBtn Left = 314 Top = 396 Width = 75 Height = 28 Caption = 'N&ext' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 2 OnClick = btnNextClick end object btnCancel: TBitBtn Left = 429 Top = 396 Width = 75 Height = 28 Caption = 'Can&cel' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 3 OnClick = btnCancelClick end object Panel1: TPanel Left = 0 Top = 0 Width = 587 Height = 378 Align = alTop TabOrder = 4 object Notebook1: TNotebook Left = 1 Top = 1 Width = 585 Height = 376 Align = alClient PageIndex = 1 TabOrder = 0 OnPageChanged = Notebook1PageChanged object TPage Left = 0 Top = 0 Caption = 'Default' object Label5: TLabel Left = 76 Top = 96 Width = 93 Height = 16 Caption = 'Sender Address' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label6: TLabel Left = 76 Top = 132 Width = 71 Height = 16 Caption = 'Smtp Server' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label7: TLabel Left = 76 Top = 169 Width = 93 Height = 16 Caption = 'Connection Port' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label8: TLabel Left = 76 Top = 205 Width = 63 Height = 16 Caption = 'Login Type' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label9: TLabel Left = 76 Top = 242 Width = 86 Height = 16 Caption = 'Account Name' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label10: TLabel Left = 76 Top = 278 Width = 57 Height = 16 Caption = 'Password' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label1: TLabel Left = 244 Top = 15 Width = 99 Height = 18 Caption = 'Email Account' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label15: TLabel Left = 76 Top = 59 Width = 79 Height = 16 Caption = 'Sender Name' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Editsender: TEdit Left = 187 Top = 93 Width = 316 Height = 24 AutoSize = False Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 0 end object Editsmtp: TEdit Left = 187 Top = 129 Width = 316 Height = 24 AutoSize = False Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 1 end object Editport: TEdit Left = 187 Top = 166 Width = 316 Height = 24 AutoSize = False Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 2 end object cbtype: TComboBox Left = 187 Top = 203 Width = 316 Height = 24 Style = csDropDownList Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ItemHeight = 16 ParentFont = False TabOrder = 3 Items.Strings = ( 'None' 'Simple Login') end object Edituser: TEdit Left = 187 Top = 239 Width = 316 Height = 24 AutoSize = False Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 4 end object Editpassword: TEdit Left = 187 Top = 276 Width = 316 Height = 24 AutoSize = False Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False PasswordChar = '*' TabOrder = 5 end object EditName: TEdit Left = 187 Top = 56 Width = 316 Height = 24 AutoSize = False Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 6 end end object TPage Left = 0 Top = 0 Caption = 'second' object Label2: TLabel Left = 241 Top = 15 Width = 110 Height = 18 Caption = 'Email Recipient' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object GroupBox1: TGroupBox Left = 50 Top = 43 Width = 481 Height = 73 Caption = 'Address Range' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 0 object ComboBox1: TComboBox Left = 18 Top = 30 Width = 446 Height = 24 Style = csDropDownList Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ItemHeight = 16 ParentFont = False TabOrder = 0 end end object GroupBox2: TGroupBox Left = 50 Top = 130 Width = 481 Height = 164 Caption = 'Included Emails' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 1 object btnSelectall: TSpeedButton Left = 443 Top = 57 Width = 29 Height = 27 Hint = 'Check All Items' Flat = True Glyph.Data = { C6050000424DC605000000000000360400002800000014000000140000000100 0800000000009001000000000000000000000001000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA A6000020400000206000002080000020A0000020C0000020E000004000000040 20000040400000406000004080000040A0000040C0000040E000006000000060 20000060400000606000006080000060A0000060C0000060E000008000000080 20000080400000806000008080000080A0000080C0000080E00000A0000000A0 200000A0400000A0600000A0800000A0A00000A0C00000A0E00000C0000000C0 200000C0400000C0600000C0800000C0A00000C0C00000C0E00000E0000000E0 200000E0400000E0600000E0800000E0A00000E0C00000E0E000400000004000 20004000400040006000400080004000A0004000C0004000E000402000004020 20004020400040206000402080004020A0004020C0004020E000404000004040 20004040400040406000404080004040A0004040C0004040E000406000004060 20004060400040606000406080004060A0004060C0004060E000408000004080 20004080400040806000408080004080A0004080C0004080E00040A0000040A0 200040A0400040A0600040A0800040A0A00040A0C00040A0E00040C0000040C0 200040C0400040C0600040C0800040C0A00040C0C00040C0E00040E0000040E0 200040E0400040E0600040E0800040E0A00040E0C00040E0E000800000008000 20008000400080006000800080008000A0008000C0008000E000802000008020 20008020400080206000802080008020A0008020C0008020E000804000008040 20008040400080406000804080008040A0008040C0008040E000806000008060 20008060400080606000806080008060A0008060C0008060E000808000008080 20008080400080806000808080008080A0008080C0008080E00080A0000080A0 200080A0400080A0600080A0800080A0A00080A0C00080A0E00080C0000080C0 200080C0400080C0600080C0800080C0A00080C0C00080C0E00080E0000080E0 200080E0400080E0600080E0800080E0A00080E0C00080E0E000C0000000C000 2000C0004000C0006000C0008000C000A000C000C000C000E000C0200000C020 2000C0204000C0206000C0208000C020A000C020C000C020E000C0400000C040 2000C0404000C0406000C0408000C040A000C040C000C040E000C0600000C060 2000C0604000C0606000C0608000C060A000C060C000C060E000C0800000C080 2000C0804000C0806000C0808000C080A000C080C000C080E000C0A00000C0A0 2000C0A04000C0A06000C0A08000C0A0A000C0A0C000C0A0E000C0C00000C0C0 2000C0C04000C0C06000C0C08000C0C0A000F0FBFF00A4A0A000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00F7F7F7F7F7F7 F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7 F7F7F7F7F7F7F700F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7000000F70404 040404040404F7F7F7F7F7F7F7F7F7F700F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7 F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F700F7F7F7F7F7F7F7F7 F7F7F7F7F7F7F7F7F7F7000000F70404040404040404F7F7F7F7F7F7F7F7F7F7 00F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7 F7F7F7F7F7F7F700F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7000000F70404 040404040404F7F7F7F7F7F7F7F7F7F700F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7 F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F700F7F7F7F7F7F7F7F7 F7F7F7F7F7F7F7F7F7F7000000F70404040404040404F7F7F7F7F7F7F7F7F7F7 00F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7 F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7 F7F7F7F7F7F7F7F7F7F7} ParentShowHint = False ShowHint = True OnClick = btnSelectallClick end object btnUnselectAll: TSpeedButton Left = 443 Top = 84 Width = 29 Height = 27 Hint = 'Uncheck All Items' Flat = True Glyph.Data = { C6050000424DC605000000000000360400002800000014000000140000000100 0800000000009001000000000000000000000001000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA A6000020400000206000002080000020A0000020C0000020E000004000000040 20000040400000406000004080000040A0000040C0000040E000006000000060 20000060400000606000006080000060A0000060C0000060E000008000000080 20000080400000806000008080000080A0000080C0000080E00000A0000000A0 200000A0400000A0600000A0800000A0A00000A0C00000A0E00000C0000000C0 200000C0400000C0600000C0800000C0A00000C0C00000C0E00000E0000000E0 200000E0400000E0600000E0800000E0A00000E0C00000E0E000400000004000 20004000400040006000400080004000A0004000C0004000E000402000004020 20004020400040206000402080004020A0004020C0004020E000404000004040 20004040400040406000404080004040A0004040C0004040E000406000004060 20004060400040606000406080004060A0004060C0004060E000408000004080 20004080400040806000408080004080A0004080C0004080E00040A0000040A0 200040A0400040A0600040A0800040A0A00040A0C00040A0E00040C0000040C0 200040C0400040C0600040C0800040C0A00040C0C00040C0E00040E0000040E0 200040E0400040E0600040E0800040E0A00040E0C00040E0E000800000008000 20008000400080006000800080008000A0008000C0008000E000802000008020 20008020400080206000802080008020A0008020C0008020E000804000008040 20008040400080406000804080008040A0008040C0008040E000806000008060 20008060400080606000806080008060A0008060C0008060E000808000008080 20008080400080806000808080008080A0008080C0008080E00080A0000080A0 200080A0400080A0600080A0800080A0A00080A0C00080A0E00080C0000080C0 200080C0400080C0600080C0800080C0A00080C0C00080C0E00080E0000080E0 200080E0400080E0600080E0800080E0A00080E0C00080E0E000C0000000C000 2000C0004000C0006000C0008000C000A000C000C000C000E000C0200000C020 2000C0204000C0206000C0208000C020A000C020C000C020E000C0400000C040 2000C0404000C0406000C0408000C040A000C040C000C040E000C0600000C060 2000C0604000C0606000C0608000C060A000C060C000C060E000C0800000C080 2000C0804000C0806000C0808000C080A000C080C000C080E000C0A00000C0A0 2000C0A04000C0A06000C0A08000C0A0A000C0A0C000C0A0E000C0C00000C0C0 2000C0C04000C0C06000C0C08000C0C0A000F0FBFF00A4A0A000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00F7F7F7F7F7F7 F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7 F7F7F7F7F7F700F700F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F700F7F70404 040404040404F7F7F7F7F7F7F7F700F700F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7 F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F700F700F7F7F7F7F7F7F7 F7F7F7F7F7F7F7F7F7F7F700F7F70404040404040404F7F7F7F7F7F7F7F700F7 00F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7 F7F7F7F7F7F700F700F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F700F7F70404 040404040404F7F7F7F7F7F7F7F700F700F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7 F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F700F700F7F7F7F7F7F7F7 F7F7F7F7F7F7F7F7F7F7F700F7F70404040404040404F7F7F7F7F7F7F7F700F7 00F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7 F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7 F7F7F7F7F7F7F7F7F7F7} ParentShowHint = False ShowHint = True OnClick = btnUnselectAllClick end object RxCheckListBox1: TRxCheckListBox Left = 17 Top = 24 Width = 427 Height = 121 CheckKind = ckCheckMarks Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ItemHeight = 18 ParentFont = False Style = lbOwnerDrawFixed TabOrder = 0 InternalVersion = 202 Strings = ( 'Home Email 1' 1 True 'Home Email 2' 1 True 'Home Email 3' 1 True 'Business Email 1' 1 True 'Business Email 2' 1 True 'Business Email 3' 1 True) end end end object TPage Left = 0 Top = 0 Caption = 'third' object Label3: TLabel Left = 14 Top = 52 Width = 85 Height = 16 Caption = 'Prefix of Name' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label4: TLabel Left = 305 Top = 52 Width = 84 Height = 16 Caption = 'Suffix of Name' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label11: TLabel Left = 14 Top = 88 Width = 81 Height = 16 Caption = 'Email Subject' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label12: TLabel Left = 14 Top = 120 Width = 82 Height = 16 Caption = 'Email Content' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label13: TLabel Left = 14 Top = 272 Width = 74 Height = 16 Caption = 'Attachments' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Button2: TSpeedButton Left = 548 Top = 292 Width = 24 Height = 24 Hint = 'Add Files' Flat = True Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666000000 00006666660FFFFFFFF06666660FF4444FF06666660FFFFFFFF06666660FF444 4FF06666660FFFFFFFF06666660FF444F0006666660FFFFFF0806600000FFFFF F006660BB00000000066000BB000666666660BBBBBB0666666660BBBBBB06666 6666000BB00066666666660BB066666666666600006666666666} ParentFont = False ParentShowHint = False ShowHint = True OnClick = Button2Click end object Button4: TSpeedButton Left = 548 Top = 316 Width = 24 Height = 24 Hint = 'Delete a item' Flat = True Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] Glyph.Data = { 42010000424D4201000000000000760000002800000011000000110000000100 040000000000CC00000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 777770000000777777777777777770000000777777777777770F700000007777 0F777777777770000000777000F7777770F770000000777000F777770F777000 00007777000F77700F777000000077777000F700F7777000000077777700000F 7777700000007777777000F777777000000077777700000F7777700000007777 7000F70F7777700000007770000F77700F7770000000770000F7777700F77000 00007700F7777777700F70000000777777777777777770000000777777777777 777770000000} ParentFont = False ParentShowHint = False ShowHint = True OnClick = Button4Click end object Label14: TLabel Left = 242 Top = 15 Width = 99 Height = 18 Caption = 'Email Content' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object ListBox1: TListBox Left = 14 Top = 292 Width = 534 Height = 48 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Arial' Font.Style = [] ItemHeight = 15 ParentFont = False TabOrder = 0 end object Memo1: TMemo Left = 14 Top = 138 Width = 555 Height = 130 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False ScrollBars = ssBoth TabOrder = 1 end object EditSubject: TEdit Left = 103 Top = 85 Width = 466 Height = 24 AutoSize = False Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 2 Text = 'Please input email subject ' end object EditPrefix: TEdit Left = 103 Top = 51 Width = 176 Height = 24 AutoSize = False Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 3 Text = 'Dear' end object EditSuffix: TEdit Left = 393 Top = 51 Width = 176 Height = 24 AutoSize = False Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 4 Text = ',' end object StatusBar1: TStatusBar Left = 0 Top = 349 Width = 585 Height = 27 BorderWidth = 1 Panels = < item Text = ' Total User: Email: Send Email' Width = 290 end item Width = 50 end> SimplePanel = False end end end end object ProgressBar1: TProgressBar Left = 8 Top = 382 Width = 74 Height = 19 Min = 0 Max = 100 Smooth = True TabOrder = 5 end object IdMsgSend: TIdMessage AttachmentEncoding = 'MIME' BccList = <> CCList = <> ContentType = 'text/plain' Encoding = meMIME Recipients = <> ReplyTo = <> Left = 9 Top = 404 end object IdAntiFreeze1: TIdAntiFreeze IdleTimeOut = 120 OnlyWhenIdle = False Left = 37 Top = 403 end object SMTP: TIdSMTP OnStatus = SMTPStatus MaxLineAction = maException ReadTimeout = 0 RecvBufferSize = 8192 OnDisconnected = SMTPDisconnected OnWork = SMTPWork OnWorkBegin = SMTPWorkBegin OnWorkEnd = SMTPWorkEnd Port = 25 AuthenticationType = atNone Left = 64 Top = 402 end end